home *** CD-ROM | disk | FTP | other *** search
- # DESCRIPTION:
- # --------------------------------------------------------------
- #
- # OPEN CD PLAYER, TEST POSITIONING OF CD, CLOSE
- #
- # --------------------------------------------------------------
- @PROCESS 1
- @BREAK A CDDA WILL NEED TO BE IN THE DEFAULT CD-ROM
- defaultconnection cdaudio00 make type cd stream to ampmix totype amp stream wait
-
- open cdaudio00 alias cdda1 shareable notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_OPEN #5
- @WAIT_NOTIFY 5 30000
-
- acquire cdda1 wait
- @WAIT_PASSDEVICE cdda1
-
- status cdda1 media present wait
- =TRUE
-
- connector cdda1 enable type cd stream notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_CONNECTOR #10
- @WAIT_NOTIFY 10 30000
-
- cue cdda1 output notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_CUE #15
- @WAIT_NOTIFY 15 30000
-
- setpositionadvise cdda1 on every 10000 notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_SET_POSITION_ADVISE #20
- @WAIT_NOTIFY 20 30000
-
- seek cdda1 to start notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_SEEK #25
- @WAIT_NOTIFY 25 30000
-
- play cdda1 notify
- +MM_MCINOTIFY MCI_NOTIFY_ABORTED MCI_PLAY #27
- #@break done playing once
-
- seek cdda1 to start notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_SEEK #30
- @WAIT_NOTIFY 27 30000
- @WAIT_NOTIFY 30 30000
-
- play cdda1 to 40000 notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_PLAY #32
- @WAIT_NOTIFY 32 30000
-
- seek cdda1 to start notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_SEEK #35
- @WAIT_NOTIFY 35 30000
-
- play cdda1 to 50000 notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_PLAY #40
- @WAIT_NOTIFY 40 30000
-
- seek cdda1 to start notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_SEEK #45
- @WAIT_NOTIFY 45 30000
-
- play cdda1 to 30000 notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_PLAY #46
- @WAIT_NOTIFY 46 30000
-
- seek cdda1 to start notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_SEEK #55
- @WAIT_NOTIFY 55 30000
-
- play cdda1 to 25000 notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_PLAY #56
- @WAIT_NOTIFY 56 30000
-
- seek cdda1 to start notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_SEEK #60
- @WAIT_NOTIFY 60 30000
-
- play cdda1 from 20000 to 30000 notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_PLAY #61
- @WAIT_NOTIFY 61 30000
-
- seek cdda1 to start notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_SEEK #65
- @WAIT_NOTIFY 65 30000
-
- play cdda1 from 60000 to 65000 notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_PLAY #66
- @WAIT_NOTIFY 66 30000
-
- seek cdda1 to start notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_SEEK #70
- @WAIT_NOTIFY 70 30000
-
- play cdda1 to 50000 notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_PLAY #71
- @WAIT_NOTIFY 71 30000
-
- seek cdda1 to start notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_SEEK #75
- @WAIT_NOTIFY 75 30000
-
- play cdda1 to 9000 notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_PLAY #76
- @WAIT_NOTIFY 76 30000
-
- seek cdda1 to start notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_SEEK #80
- @WAIT_NOTIFY 80 30000
-
- play cdda1 to 14000 notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_PLAY #81
- @WAIT_NOTIFY 81 30000
-
- stop cdda1 notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_STOP #95
- @WAIT_NOTIFY 95 30000
-
- Close cdda1 notify
- +MM_MCINOTIFY MCI_NOTIFY_SUCCESSFUL MCI_CLOSE #96
- @WAIT_NOTIFY 96 30000
-